REM *************************  Shutter Delay ************************
REM This is the Script file of shutter delay
REM Project: SL203
REM Release Date: 2011/08/29
REM Author: WeiLee
REM v0.0010: Init Version. Port from S9E14
REM *******************************************************

5 SYSTEM KeyEventDisable()
6 FOREIGN PowerSaving(0)

20  LET Ret = 0
30  LET RETSD = 0
40  FOREIGN RETSD = LensCali_BackDoor(407,1)
50  FOREIGN RetSD = LensCali_Shutter()
60  SYSTEM KeyEventEnable()
100 IF RetSD == 0 THEN 300

REM *****Fail case*****
200 LET Str = "NG ErrCode: " + RetSD
210 FOREIGN Ret = OneCard_FlgSet(0)
REM 220 FOREIGN Ret = OneCard_ErrPrint(Str)
219 FOREIGN KeyReview(0)
220 FOREIGN OneCard_ErrCodePrint(RetSD)
230 END

REM *****Pass case*****
300 FOREIGN Ret = OneCard_FlgSet(1)
310 FOREIGN OneCardTest(1)

10000 END

RUN
